home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Especial Multimedia
/
Especial Multimedia.iso
/
Multimed
/
Musica
/
ZMUD32.ZIP
/
ZMUD.EXE
/
0
/
RCDATA
/
TCHARDIALOG
/
TCHARDIALOG.txt
Wrap
Text File
|
1997-06-09
|
40KB
|
1,234 lines
object CharDialog: TCharDialog
Left = 261
Top = 170
HelpContext = 160
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsDialog
Caption = 'Character Database'
ClientHeight = 331
ClientWidth = 632
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label12: TLabel
Left = 8
Top = 8
Width = 107
Height = 13
Caption = 'Stored Characters:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 8
Top = 24
Width = 166
Height = 13
Caption = 'Click on a character below to edit it'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 8
Top = 38
Width = 133
Height = 13
Caption = 'Double-click to connect to it'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 8
Top = 56
Width = 20
Height = 13
Caption = 'Red'
Font.Color = clRed
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 34
Top = 56
Width = 120
Height = 13
Caption = 'characters are getting old'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object CharTab: TTabbedNotebook
Left = 232
Top = 0
Width = 397
Height = 294
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
TabsPerRow = 4
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
OnChange = CharTabChange
object TTabPage
Left = 4
Top = 24
Caption = 'Connection'
object Label2: TLabel
Left = 147
Top = 50
Width = 23
Height = 13
Alignment = taRightJustify
Caption = 'Title:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 9
Top = 194
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Character:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 233
Top = 194
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Password:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 33
Top = 74
Width = 25
Height = 13
Alignment = taRightJustify
Caption = 'Host:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 268
Top = 74
Width = 22
Height = 13
Alignment = taRightJustify
Caption = 'Port:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 33
Top = 98
Width = 25
Height = 13
Alignment = taRightJustify
Caption = 'Addr:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 6
Top = 218
Width = 52
Height = 13
Alignment = taRightJustify
Caption = 'Comments:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Image2: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object LookupBtn: TSpeedButton
Tag = 1
Left = 205
Top = 98
Width = 20
Height = 20
Hint = 'Compute IP Address|'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF7333337000000000733333377777777733330000}
NumGlyphs = 2
OnClick = LookupBtnClick
end
object WizBtn: TSpeedButton
Tag = 1
Left = 64
Top = 122
Width = 137
Height = 25
Hint = 'MUD Wizard|'
Caption = 'Connection Wizard'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = WizBtnClick
end
object Label17: TLabel
Left = 64
Top = 22
Width = 296
Height = 13
Caption = 'enter the Title of the MUD and the Host and Port to connect to'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 16
Top = 152
Width = 369
Height = 9
Shape = bsTopLine
end
object Label20: TLabel
Left = 48
Top = 8
Width = 192
Height = 13
Caption = 'Enter a unique ID for this character, then'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 44
Top = 50
Width = 14
Height = 13
Alignment = taRightJustify
Caption = 'ID:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object UseBtn: TSpeedButton
Tag = 1
Left = 228
Top = 98
Width = 29
Height = 20
Hint = 'Use IP Address|'
AllowAllUp = True
GroupIndex = 1
Caption = 'Use'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
NumGlyphs = 2
ParentFont = False
end
object Label18: TLabel
Left = 64
Top = 158
Width = 233
Height = 13
Caption = 'The character name and password will be '
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 64
Top = 172
Width = 217
Height = 13
Caption = 'auto-detected when you first log on'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Title: TEdit
Left = 176
Top = 48
Width = 201
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object MUDType: TComboBox
Left = 272
Top = 96
Width = 105
Height = 21
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'Diku'
'Circle'
'MERC'
'LPMUD'
'MOO'
'MUCK'
'MUSH'
'MUD'
'DGD')
ParentFont = False
TabOrder = 4
end
object CharName: TEdit
Left = 64
Top = 192
Width = 161
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object Password: TEdit
Left = 288
Top = 192
Width = 89
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 6
end
object Host: TEdit
Left = 64
Top = 72
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Port: TEdit
Left = 296
Top = 72
Width = 81
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Addr: TEdit
Left = 64
Top = 96
Width = 137
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object Comments: TEdit
Left = 64
Top = 216
Width = 313
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object Panel1: TPanel
Left = 0
Top = 248
Width = 389
Height = 18
Align = alBottom
BevelOuter = bvLowered
TabOrder = 9
object Label8: TLabel
Left = 4
Top = 3
Width = 78
Height = 13
Alignment = taRightJustify
Caption = 'Last Connected:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 252
Top = 3
Width = 53
Height = 13
Alignment = taRightJustify
Caption = 'Total Time:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LastTime: TEdit
Left = 88
Top = 3
Width = 145
Height = 14
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = 'LastTime'
end
object TotalSec: TEdit
Left = 309
Top = 3
Width = 73
Height = 14
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = '255 24:00:00'
end
end
object Name: TEdit
Left = 64
Top = 48
Width = 73
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Files'
object Label1: TLabel
Left = 28
Top = 138
Width = 78
Height = 13
Alignment = taRightJustify
Caption = 'Primary Settings:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 308
Top = 136
Width = 20
Height = 20
Hint = 'Select primary file|'
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = FileNameClick
end
object Label10: TLabel
Left = 21
Top = 162
Width = 85
Height = 13
Alignment = taRightJustify
Caption = 'Inherited Settings:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton2: TSpeedButton
Tag = 1
Left = 308
Top = 160
Width = 20
Height = 20
Hint = 'Select inherited file|'
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = FileNameClick
end
object Image3: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label21: TLabel
Left = 48
Top = 44
Width = 273
Height = 13
Caption = 'The Inherited Settings file is loaded before your primary file'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 48
Top = 14
Width = 280
Height = 13
Caption = 'The Settings File contains the preferences, triggers, aliases,'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 64
Top = 28
Width = 141
Height = 13
Caption = 'macros, etc for your character'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 64
Top = 58
Width = 237
Height = 13
Caption = 'and typically contains defaults for the type of MUD'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 48
Top = 76
Width = 287
Height = 13
Caption = 'The Folder allows you to keep settings for MUD in a directory'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 48
Top = 196
Width = 221
Height = 13
Caption = 'Enter the number of days till the entry turns red '
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 67
Top = 209
Width = 235
Height = 13
Caption = 'indicating the character hasn'#39't been used recently'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label29: TLabel
Left = 27
Top = 235
Width = 79
Height = 13
Alignment = taRightJustify
Caption = 'Days till warning:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 74
Top = 114
Width = 32
Height = 13
Alignment = taRightJustify
Caption = 'Folder:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label32: TLabel
Left = 64
Top = 90
Width = 229
Height = 13
Caption = 'hierarchy containing settings, maps, sounds, etc.'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton3: TSpeedButton
Left = 308
Top = 112
Width = 20
Height = 20
Hint = 'Select folder|'
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = SpeedButton3Click
end
object FileName: TEdit
Left = 112
Top = 136
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Parent: TEdit
Left = 112
Top = 160
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object WarnDays: TEdit
Left = 112
Top = 233
Width = 58
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Folder: TEdit
Left = 112
Top = 112
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Notes'
object Image1: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label15: TLabel
Left = 48
Top = 16
Width = 240
Height = 13
Caption = 'Enter any comments for this character on this MUD'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Notes: TMemo
Left = 8
Top = 48
Width = 369
Height = 209
ScrollBars = ssBoth
TabOrder = 0
end
end
end
object NewBtn: TBitBtn
Left = 8
Top = 300
Width = 77
Height = 27
Caption = '&New'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = NewBtnClick
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object DelBtn: TBitBtn
Left = 167
Top = 300
Width = 27
Height = 27
Hint = 'Delete character|'
TabOrder = 6
OnClick = DelBtnClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F33333333330000033333333333777773333330000}
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object HelpBtn: TBitBtn
Left = 552
Top = 300
Width = 77
Height = 27
HelpContext = 160
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
Kind = bkHelp
Spacing = -1
IsControl = True
end
object CopyBtn: TBitBtn
Left = 88
Top = 300
Width = 77
Height = 27
Caption = 'Copy'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = CopyBtnClick
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF
0303030303030303030000000000000000000003030303030303030303F8F8F8
F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303
0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF
FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303
0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF
03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03
FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303
F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF
FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF
FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF
0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03
0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303
F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF
0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF
FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303
0303030300FF070707070707FF0003030303030303030303F8FF030303030303
03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303
F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303
0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF
FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303
030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
end
object LoadBut: TBitBtn
Left = 232
Top = 300
Width = 77
Height = 27
Caption = 'Connect'
Default = True
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 1
OnClick = LoadButClick
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 312
Top = 300
Width = 77
Height = 27
Caption = '&Offline'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 4
ParentFont = False
TabOrder = 2
OnClick = LoadButClick
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
66666666000066000000000000000866000060F77777777777778086000060F7
8787877888878806000060F77777777000078806000060FFFFFFFFFFFFFF8806
000060F7888888888888F806000066080000000000088F060000666077777777
778000660000666070000000078806660000666070C4C4C40788066600006660
704C4C4C078806660000666070C4C4C40788066600006660704C4C4C07880666
0000666070C4C4C4078806660000666070000000078806660000666077777777
77880666000066600FFFFFFFFFF8066600006666600000000000666600006666
66666666666666660000}
end
object CharListBox: TListBox
Left = 0
Top = 160
Width = 233
Height = 97
ItemHeight = 13
Sorted = True
TabOrder = 8
Visible = False
end
object CloseBtn: TBitBtn
Left = 198
Top = 300
Width = 27
Height = 27
Hint = 'Open a blank window|'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 7
ParentFont = False
TabOrder = 3
OnClick = CloseBtnClick
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333300000000000
000033333333333333333077777777777770333333333333333330FFFFFFFFFF
FF70333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF70333333333333333330444444444444403333333333333333300000000000
0000333333333333333333333333333333333333333333333333000000000000
0000000000000000000000000000000000000000}
Margin = 3
NumGlyphs = 2
end
object CharGrid: TDrawGrid
Left = 7
Top = 74
Width = 218
Height = 219
ColCount = 3
DefaultRowHeight = 17
FixedCols = 0
RowCount = 20
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect, goThumbTracking]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 9
OnClick = CharGridClick
OnDblClick = CharGridDblClick
OnDrawCell = CharGridDrawCell
OnMouseDown = CharGridMouseDown
ColWidths = (
50
54
213)
end
object CancelBtn: TBitBtn
Left = 472
Top = 300
Width = 77
Height = 27
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
OnClick = CancelBtnClick
Kind = bkCancel
end
object BitBtn1: TBitBtn
Left = 392
Top = 300
Width = 77
Height = 27
Caption = '&Save'
Default = True
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = BitBtn1Click
Glyph.Data = {
CE070000424DCE07000000000000360000002800000024000000120000000100
1800000000009807000000000000000000000000000000000000008284008284
0082840082840082840082840082840082840082840082840082840082840082
8400828400828400828400828400828400828400828400828400828400828400
8284008284008284008284008284008284008284008284008284008284008284
0082840082840082840082840082840082840082840082840082840082840082
8400828400828400828400828400828400828400828400828400828400828400
8284008284008284008284008284FFFFFF008284008284008284008284008284
0082840082840082840082840082840082840082840082840082840082840082
8484000084000000828400828400828400828400828400828400828400828400
8284008284008284008284008284008284008284008284848284848284FFFFFF
0082840082840082840082840082840082840082840082840082840082840082
8400828400828400828484000000820000820084000000828400828400828400
8284008284008284008284008284008284008284008284008284008284008284
848284008284008284848284FFFFFF0082840082840082840082840082840082
8400828400828400828400828400828400828484000000820000820000820000
8200840000008284008284008284008284008284008284008284008284008284
008284008284008284848284008284008284008284008284848284FFFFFF0082
8400828400828400828400828400828400828400828400828400828484000000
8200008200008200008200008200008200840000008284008284008284008284
0082840082840082840082840082840082848482840082840082840082840082
84008284008284848284FFFFFF00828400828400828400828400828400828400
828400828484000000820000820000820000FF00008200008200008200008200
840000008284008284008284008284008284008284008284008284848284FFFF
FF008284008284848284FFFFFF008284008284008284848284FFFFFF00828400
828400828400828400828400828400828400820000820000820000FF00008284
00FF000082000082000082008400000082840082840082840082840082840082
84008284008284848284FFFFFF008284848284008284848284FFFFFF00828400
8284848284FFFFFF00828400828400828400828400828400828400828400FF00
00820000FF0000828400828400828400FF000082000082000082008400000082
84008284008284008284008284008284008284848284FFFFFF84828400828400
8284008284848284FFFFFF008284008284848284FFFFFF008284008284008284
00828400828400828400828400FF0000828400828400828400828400828400FF
0000820000820000820084000000828400828400828400828400828400828400
8284848284008284008284008284008284008284848284FFFFFF008284008284
848284FFFFFF0082840082840082840082840082840082840082840082840082
8400828400828400828400828400FF0000820000820000820084000000828400
8284008284008284008284008284008284008284008284008284008284008284
008284848284FFFFFF008284008284848284FFFFFF0082840082840082840082
8400828400828400828400828400828400828400828400828400828400FF0000
8200008200008200840000008284008284008284008284008284008284008284
008284008284008284008284008284008284848284FFFFFF0082840082848482
84FFFFFF00828400828400828400828400828400828400828400828400828400
828400828400828400828400FF00008200008200008200840000008284008284
0082840082840082840082840082840082840082840082840082840082840082
84848284FFFFFF008284008284848284FFFFFF00828400828400828400828400
828400828400828400828400828400828400828400828400828400FF00008200
0082000082008400000082840082840082840082840082840082840082840082
84008284008284008284008284008284848284FFFFFF008284008284848284FF
FFFF008284008284008284008284008284008284008284008284008284008284
00828400828400828400FF000082000082008400000082840082840082840082
8400828400828400828400828400828400828400828400828400828400828484
8284FFFFFF008284848284FFFFFF008284008284008284008284008284008284
00828400828400828400828400828400828400828400828400FF000082000082
0000828400828400828400828400828400828400828400828400828400828400
8284008284008284008284008284848284FFFFFF848284008284008284008284
0082840082840082840082840082840082840082840082840082840082840082
8400828400828400FF0000828400828400828400828400828400828400828400
8284008284008284008284008284008284008284008284008284008284848284
0082840082840082840082840082840082840082840082840082840082840082
8400828400828400828400828400828400828400828400828400828400828400
8284008284008284008284008284008284008284008284008284008284008284
008284008284008284008284008284008284}
NumGlyphs = 2
end
object OpenFileDialog: TOpenDialog
DefaultExt = 'mud'
FileEditStyle = fsEdit
Filter = 'MUD Files|*.mud|All files|*.*'
Left = 184
Top = 8
end
object CharPop: TPopupMenu
Left = 184
Top = 40
object Connect1: TMenuItem
Caption = 'Connect'
ShortCut = 0
OnClick = Connect1Click
end
object Offline1: TMenuItem
Caption = 'Offline'
ShortCut = 0
OnClick = Offline1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object New1: TMenuItem
Caption = 'New'
ShortCut = 0
OnClick = NewBtnClick
end
object Delete1: TMenuItem
Caption = 'Delete'
ShortCut = 0
OnClick = DelBtnClick
end
object Copy1: TMenuItem
Caption = 'Copy'
ShortCut = 0
OnClick = CopyBtnClick
end
end
end